﻿Imports Microsoft.VisualBasic

Public Class Class1

    Private keepEtairia As String = "none"

    Public Sub setKeepEtairia(ByVal selected_etairia As String)
        keepEtairia = selected_etairia
    End Sub

    Public Function getKeepEtairia() As String
        Return keepEtairia
    End Function

End Class
